30000 FORL=54272TO54296:POKEL,0:NEXT
30010 S=54272:POKES+24,15
30020 FORI=1TO5:POKE53281,1
30030 TQ=TI
30032 IFTI<TQ+4THEN30032
30040 POKE53281,0
30050 TQ=TI
30052 IFTI<TQ+4THEN30052
30060 POKE53281,0:NEXT
30070 POKES+5,28:POKES+1,40:POKES+4,128:POKES+4,129
30080 TQ=TI
30082 IFTI<TQ+120THEN30082
30090 POKES+4,0